home *** CD-ROM | disk | FTP | other *** search
/ Holt Researcher: American History / Holt Researcher: American History.iso / pc / modules / srchhelp.dxr / 00002_search help class.ls < prev    next >
Encoding:
Text File  |  2000-01-14  |  1.1 KB  |  50 lines
  1. property pCloseBoxObj, pBackButtonObj, pContinueButtonObj
  2.  
  3. on getCloseBoxObj me
  4.   return pCloseBoxObj
  5. end
  6.  
  7. on getBackButtonObj me
  8.   return pBackButtonObj
  9. end
  10.  
  11. on getContinueButtonObj me
  12.   return pContinueButtonObj
  13. end
  14.  
  15. on new me
  16.   pCloseBoxObj = new(script("close box"), "close box", "Global", 3, the loc of sprite 3)
  17.   Inscope(pCloseBoxObj)
  18.   pBackButtonObj = new(script("Back Button"), "Back Button", "Internal", 6, the loc of sprite 6)
  19.   Inscope(pBackButtonObj)
  20.   pContinueButtonObj = new(script("Continue Button"), "Continue Button", "Internal", 7, the loc of sprite 7)
  21.   Inscope(pContinueButtonObj)
  22.   return me
  23. end
  24.  
  25. on dispose me
  26.   me._me = 0
  27. end
  28.  
  29. on enterScreen me
  30.   label1 = label("1")
  31.   label2 = label("2")
  32.   label3 = label("3")
  33.   case the frame of
  34.     label1:
  35.       disable(pBackButtonObj)
  36.       enable(pContinueButtonObj)
  37.     label2:
  38.       enable(pBackButtonObj)
  39.       enable(pContinueButtonObj)
  40.     label3:
  41.       enable(pBackButtonObj)
  42.       disable(pContinueButtonObj)
  43.   end case
  44. end
  45.  
  46. on idleScreen me
  47.   doRollover(pBackButtonObj)
  48.   doRollover(pContinueButtonObj)
  49. end
  50.